|
Autocad VBA : Zeichnungseinstellungen auslesen
sarotti am 26.01.2006 um 13:58 Uhr (0)
Hallo,durch ein VBA-Makro füge ich Blöcke in eine Zeichnung ein. Diese Blöcke kann der Anwender über Optionsbutton skalieren (mm, cm, m), ebenfalls kann der Block gedreht werden.Jetzt möchte ich die Auswahlschalter sinnvoll vorbelegen und da fangen meine Probleme an.1.) Unter Extras/Optionen/Benutzereinstellung kann man die Zeichnungseinheit einstellen, aber wie kann ich die unter VBA auslesen?2.) Wie lese ich die Winkeleinheit (Grad/Gon) aus dem aktuellen Bemassungsstil aus?Im Forum und im "AutoCad mit VB ...
| | In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Objektauswahl an Eigenschaftenfenster übergeben
sarotti am 04.10.2007 um 16:13 Uhr (0)
Hallo Carsten, hallo Wilfried,das mit der Farbe 9 war nur ein Beispiel. Mein Makro durchläuft die gesamte Autocad-Sitzung und zeigt den Inhalt nach Layer, Farbe, Textbreite usw. an.Nachdem ich jetzt weis, was in der Zeichnung von meinem Standard abweicht, muss ich die einzelnen Elemente auswählen und deren Eigenschaften ändern.Wilfried,wenn ich Dein Code richtig verstehe, dann muss ich für jedes Objekt (Linien, Texte, Blöcke usw.) einen eigenen Filter schreiben, und diese Auswahl übergeben.Jetzt könnten di ...
| | In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Zeichnungseinstellungen auslesen
sarotti am 27.01.2006 um 11:54 Uhr (0)
Zu 2.) Man erzeuge ein Winkelobjekt, lese die Eigenschaften aus und lösche dieses Objekt anschließend. Das Objekt wird immer mit den Eigenschaften des aktuellen Bemaßungsstil erzeugt. Winkelbemaßungsstil auslesen (Dezimalgrad,GradMinutenSekunden, Gon,Radiant) Winkelobjekt in die Zeichnung einfügen und Eigenschaft auslesen Dim DimPointAngularObj As AcadDim3PointAngular Dim AngleVertex(0 To 2) As Double Dim FirstPoint(0 To 2) As Double, SecondPoint(0 To 2) As Double Dim TextPoint(0 To 2) As Double Dim ...
| | In das Form Autocad VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
